home *** CD-ROM | disk | FTP | other *** search
/ Old Testament Foundatiosn with Philip Yancey / Old Testament Foundatiosn with Philip Yancey - Disc 1.iso / pc / data / m70.dir / 00107.ls < prev    next >
Encoding:
Text File  |  1996-09-06  |  527 b   |  23 lines
  1. on startMovie
  2.   global gOnIBM
  3.   identifyPlatform()
  4.   formatDisplayFields()
  5. end
  6.  
  7. on formatDisplayFields
  8.   global gOnIBM
  9.   if gOnIBM then
  10.     repeat with x = 1 to 8
  11.       set myField to "tutorial" & x & ".text"
  12.       set the textFont of field myField to "Arial"
  13.       set the textSize of field myField to 12
  14.     end repeat
  15.   else
  16.     repeat with x = 1 to 8
  17.       set myField to "tutorial" & x & ".text"
  18.       set the textFont of field myField to "Geneva"
  19.       set the textSize of field myField to 12
  20.     end repeat
  21.   end if
  22. end
  23.